home *** CD-ROM | disk | FTP | other *** search
/ HyperLib 1997 Winter - Disc 1 / HYPERLIB-1997-Winter-CD1.ISO.7z / HYPERLIB-1997-Winter-CD1.ISO / オンラインウェア / GAME / HyperDungeon1.1.sit / HyperDungeon1.1 / Hyper Dungeon1.1 / stack_-1.xml < prev    next >
Extensible Markup Language  |  1995-03-17  |  20KB  |  16 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
  3. <stack>
  4.     <name>in.1</name>
  5.     <id>-1</id>
  6.     <cardCount>62</cardCount>
  7.     <cardID>35831</cardID>
  8.     <listID>24221</listID>
  9.     <cantModify><false /></cantModify>
  10.     <cantDelete><true /></cantDelete>
  11.     <cantAbort><false /></cantAbort>
  12.     <cardSize>
  13.         <width>512</width>
  14.         <height>342</height>
  15.     </cardSize>
  16.     <script>on dedanswer "ﾃｳﾃ陛‡ﾂｬﾃ‡ﾂｴﾃ‡ﾆ津ｩﾃ„ﾃ‡ﾃ津‡竕暗‡ﾂｵﾃ‡窶ｹﾃ‡ﾂ｡ﾃ‡ﾎｩﾃ③"with"ﾃ‡ﾂｵﾃ‡竕 ﾃ‡ﾂｵﾃ‡竕 "put Round(fld"GOLD"/2) into fld"GOLD"wait 60visual effect dissolve very slowgo to cd "dark"wait 10visual effect dissolve slowgo to card"ﾃ英ﾃ噂ﾃ嘘ﾃ嘉ｬﾃｩ竏ｫﾃ‡ﾃε栄ﾃ陰"put fld "MAX HP"into fld"HP"end dedon lvUpif fld "LV" > 15 thenadd 1200 to fld "EXN"end ifif fld "LV" > 25 thenadd 10000 to fld "EXN"end ifif fld "LV" > 30 thenadd 40000 to fld "EXN"end ifif fld"NAME"is"ﾃ嘉､ﾃ嘉､ﾃ厩" thenlvUp1exit lvUpend ifadd 1 to fld"LV"put fld"LV"into aadd 30*a to fld"EXN"play "pi"add random of 6 to fld"MAX HP"add random of 2 to fld"MAX MP"add random of 4 to fld"ﾃ‡ﾃｸﾃ‡ﾂｩﾃ‡ﾃ"add random of fld "MAX HP" to fld "HP"if fld"HP"> fld"MAX HP" then put fld"MAX HP" into fld"HP"if fld"EX" >= fld"EXN" then lvUpend lvUpon lvUp1add 1 to fld"LV"put fld"LV"into aadd 28*a to fld"EXN"play "pi"add random of 5 to fld "MAX HP"put fld"MAX HP" into fld"HP"add random of 3 to fld "MAX MP"add random of 3 to fld "ﾃ‡ﾃｸﾃ‡ﾂｩﾃ‡ﾃ"if fld"EX" >= fld"EXN" then lvUpend lvUp1on R1answer"ﾃｫﾃεｳﾃ陛‡邃｢ﾃ｢ﾃ津ｯﾃｺﾃ‡竏妥‡ﾃ暗‡ﾃ甘③ﾃｩgﾃ‡ﾂ｢ﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨"with"ﾃｩgﾃ‡ﾂｧ"or"ﾃ鵜ﾃ嘉嘉嘉ｬﾃ瓜ﾃ嘉｣"if it is"ﾃ鵜ﾃ嘉嘉嘉ｬﾃ瓜ﾃ嘉｣" then exit R1if fld MP<3 thenanswer "MPﾃ‡邃｢ﾃ‡ﾎｩﾃ‡ﾃ凝‡ﾂｻﾃ‡ﾂ｢ﾃ‡ﾃ甘③"with"OK"exit R1end ifif it is"ﾃｩgﾃ‡ﾂｧ" thensubtract 3 from fld MPput random of 12 into aadd (a+10) to fld HPif fld"HP" >= fld "MAX HP" then put fld "MAX HP" into fld "HP"if it is"ﾃｩgﾃ‡ﾂｧ" then play "ﾃ｢ﾃ津ｯﾃｺ"q5end ifend R1on R2answer"ﾃｫﾃεｳﾃ陛‡邃｢ﾃ｢ﾃ津ｯﾃｺﾃ‡竏妥‡ﾃ暗‡ﾃ甘③ﾃｩgﾃ‡ﾂ｢ﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨"with "ﾃｩgﾃ‡ﾂｧ"or"ﾃ鵜ﾃ嘉嘉嘉ｬﾃ瓜ﾃ嘉｣"if it is"ﾃ鵜ﾃ嘉嘉嘉ｬﾃ瓜ﾃ嘉｣" then exit R2if fld MP<7 then answer "MPﾃ‡邃｢ﾃ‡ﾎｩﾃ‡ﾃ凝‡ﾂｻﾃ‡ﾂ｢ﾃ‡ﾃ甘‡ﾂｮﾃ③"with"OK"if fld MP<7 then exit R2if it is"ﾃｩgﾃ‡ﾂｧ"then subtract 7 from fld MPput random of 15 into aif it is"ﾃｩgﾃ‡ﾂｧ"then add (a+20) to fld HPif fld "HP">=fld "MAX HP" then put fld "MAX HP" into fld "HP"if it is"ﾃｩgﾃ‡ﾂｧ"then play"ﾃ｢ﾃ津ｯﾃｺ" a5end R2on R3answer"ﾃｨﾃｹﾃ‡邃｢ﾃ､ﾃ†ﾃｫSﾃ‡窶ｦﾃｩﾂｰﾃ‡ﾃ凝‡窶ｹﾃ‡竏妥③ﾃｩgﾃ‡ﾂ｢ﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨"with"ﾃｩgﾃ‡ﾂｧ"or"ﾃ鵜ﾃ嘉嘉嘉ｬﾃ瓜ﾃ嘉｣"if it is "ﾃ鵜ﾃ嘉嘉嘉ｬﾃ瓜ﾃ嘉｣"then exit R3if fld MP<15 then answer"MPﾃ‡邃｢ﾃｯsﾃｫﾂｴﾃ‡竕暗ｩgﾃ‡ﾂｶﾃ‡ﾂｻﾃ‡ﾂｩﾃ‡ﾂ｡ﾃ‡ﾎｩﾃ③"with"OK"if fld MP<15 then exit R3if it is"ﾃｩgﾃ‡ﾂｧ"then subtract 15 from fld MPif it is"ﾃｩgﾃ‡ﾂｧ"then put fld "MAX HP" into fld "HP"if it is"ﾃｩgﾃ‡ﾂｧ"then play"ﾃ｢ﾃ津ｯﾃｺ" w2end R3on moneyanswer"ﾃｩﾂｸﾃ‡ﾃ凝‡窶ｦﾃｳﾃｩﾃ‡ﾃｸﾃ‡ﾆ津‡ﾂ｢ﾃ‡ﾃ暗‡ﾂｮﾃ｣窶｡ﾃ‡ï｣ｿﾃｨEﾃ‡ﾂ｢ﾃ‡窶ｹﾃ‡竏妥③ﾃｩgﾃ‡ﾂ｢ﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨"with"ﾃｩgﾃ‡ﾂｧ"or"ﾃ鵜ﾃ嘉嘉嘉ｬﾃ瓜ﾃ嘉｣"if it is"ﾃ鵜ﾃ嘉嘉嘉ｬﾃ瓜ﾃ嘉｣"then exit moneyif fld MP<13 then answer"MPﾃ‡邃｢ﾃ‡ﾎｩﾃ‡ﾃ凝‡ﾂｻﾃ‡ﾂ｢ﾃ⑩"with"OK"if fld MP<13 then exit moneyif it is"ﾃｩgﾃ‡ﾂｧ"then subtract 13 from fld MPif it is"ﾃｩgﾃ‡ﾂｧ"then put random of 500 into gif it is"ﾃｩgﾃ‡ﾂｧ"then add g+fld"ﾃ‡ﾃｸﾃ‡ﾂｩﾃ‡ﾃ" to fld "GOLD"end moneyon gagaAanswer"Use?"with"yes"or"no"if it is"no"then exit gagaAif fld MP<15 then answer"MPﾃ‡邃｢ﾃ‡ﾎｩﾃ‡ﾃ凝‡ﾂｻﾃ‡ﾂ｢"with"OK"if fld MP<15 then exit gagaAput random of 15  into wif it is"yes"then subtract w from fld MPif it is"yes"then add 3*w to fld "HP"if fld"HP" >= fld"MAX HP" then put fld "MAX HP" into fld"HP"play "ﾃ｢ﾃ津ｯﾃｺ" w2end gagaAon faanswer"ﾃ｢ﾃ､ﾃ‡ﾃεｱﾃ‡ﾃｱ@ﾃ‡竕暗‡竏妥③ﾃｧﾂｰﾃ‡ﾃ陛ｩgﾃ‡ﾂｶﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③"with"OK"end faon Frianswer"ﾃｯXﾃ‡ﾃεｱﾃ‡ﾃｱ@ﾃ‡竕暗‡竏妥③ﾃｧﾂｰﾃ‡ﾃ陛ｩgﾃ‡ﾂｶﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③"with"OK"end Frion gagaBanswer"ﾃｩgﾃ‡ﾂｧﾃ⑨"with"yes"or"no"if it is"no"then exit gagaBif fld MP<25 then answer"MPﾃ‡邃｢ﾃ‡ﾎｩﾃ‡ﾃ凝‡ﾂｻﾃ‡ﾂ｢"with"OK"if fld MP<25 then exit gagaBput random of 2 into wif it is"yes"then subtract 25 from fld MPif it is"yes"then add w to fld "ﾃ‡ﾃｸﾃ‡ﾂｩﾃ‡ﾃ"answer"ﾃｳﾃ陛‡邃｢" & w & "ﾃ榎ﾃ韻ﾃ嘉ｬﾃ曳ﾃｨ窶榲ｨ竏"play bokanend gagaBon initGAMEput""into fld"ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈲"put""into fld"ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈻"put""into fld"ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈶"put""into fld"ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈳"put""into fld"ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈵"put""into fld"ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈼"put""into fld"ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈽"lock screengo to cd "MOﾃ‡ﾃεｯﾃｮﾃ｢ﾃ†"show cd btn id 3lock screengo to cd LC575hide cd fld "ﾃ嘉ｧﾃ叡ﾃ丑ﾃ‡ﾃεｬﾃｶﾃ‡ﾂｶ"lock screengo to cd "ﾃ｣窶｡ﾃ･窶ｦﾃｩ竏ｫ"show cd btn "ﾃ｣窶｡ﾃ･窶ｦ"lock screengo to cd "ﾃ嘉ｨﾃ韻ﾃ‡ﾃεｯﾃｮﾃ｢ﾃ†"show cd btn hesokurilock screengo to cd"ﾃｬ窶ｰﾃ‡ﾃεｯﾃｮﾃ｢ﾃ†ﾃ㈻"show cd btn "ﾃ‡ﾂｮﾃ｣窶｡"hide cd btn keyshow cd btn "ﾃ･ﾃ†"lock screengo to cd"ﾃ､[ﾃｧﾃｺﾃ‡ﾃεｯﾃｮﾃ｢ﾃ†"show cd btn gaikotuhide cd btn "ﾃ‡窶 ﾃ‡ﾂｻ"lock screengo to cd"kouri"show cd btn "bom"hide cd btn "ﾃｮﾃｶﾃｭe"show cd btn movelock screengo to cd "a-1"show cd btn"ﾃ陰ﾃ韻ﾃ影ﾃ嘉„"lock screengo to cd"ﾃ臼ﾃ…[ﾃ‡ﾃεｯﾃｮﾃ｢ﾃ†"hide cd btn"ﾃ･ﾃ†ﾃ･ﾃ､"lock screengo to cd"NEW ZONE"show cd btn "ﾃｱhﾃ､ﾂｶﾃｭﾃ–"show cd btn "ﾃ烏ﾃ嘉､ﾃ丑ﾃ欝ﾃ…["show cd btn "ﾃ厭ﾃ瑛ﾃ…["lock screengo to cd "ﾃ嘉｢ﾃ厩ﾃ曳ﾃ㈻"show cd btn "ﾃ‡ﾂｮﾃ‡竏†ﾃ‡ﾂｵﾃ‡窶 ﾃ‡ﾂｻ"lock screengo to cd "ﾃｭnﾃ｢竏ｫ"hide cd btn "ﾃ衛ﾃ嘉ｬﾃ曳"lock screengo to cd "nasi"hide cd btn "ﾃ‡ﾂ ﾃ‡ﾃ佚‡窶 ﾃ‡ﾂｻ"lock screengo to cd"ﾃ｣窶｡ﾃ･窶ｦﾃｩ竏ｫ"hide cd btn "ﾃ｢ﾃ津ｯﾃｺ"lock screengo to cd"ﾃｱﾂｿﾃｲHﾃ㈻"hide cd btn "ﾃ厭ﾃ叡ﾃ丑"hide cd fld "ﾃ‡ﾂ｢"lock screengo to cd"ﾃｱﾂｿﾃｲHﾃ㈶"put"" into cd fld "ﾃ‡ïｬづ‡ﾂ｢ﾃ‡ﾃŽ"show cd btn "0438"hide cd btn "ﾃ栄ﾃ陰"lock screengo to cd"ﾃ英ﾃ…[ﾃ噂ﾃ嘉ｬ"hide cd btn "ﾃ厭ﾃ姥ﾃ叡ﾃ丑ﾃ榎ﾃ…[ﾃ鰻ﾃ嘉｡ﾃ嘉ｬ"show cd btn potionlock screengo to cd"ﾃ嘉｢ﾃ厩ﾃ曳ﾃ㈶"show cd btn "ﾃ栄ﾃ陰"hide cd btn "ﾃ栄ﾃ陰ﾃ㈻"lock screengo to cd"ﾃｱﾂｿﾃｲHﾃ㈲"show cd btn "ﾃ栄ﾃ陰"hide cd btn "ﾃ栄ﾃ陰ﾃ㈻"lock screengo to cd "ﾃ､窶堙‡ﾃε‡ﾂｻﾃ‡ﾂ｢ﾃｯﾃｮﾃ｢ﾃ†"show cd btn "ﾃｫﾃεｳﾃ陛ｫﾃｹﾃｯﾃｹ"LOCK SCREENgo to cd"ﾃ英ﾃ噂ﾃ嘘ﾃ嘉ｬﾃｩ竏ｫ"show cd btn "ﾃ‡ﾂｮﾃ‡ﾂｩﾃ‡ﾃ\"unlock screengo to cd "ﾃ迂ﾃ…[ﾃ益ﾃ泳ﾃ嘉ｬﾃ碓"put"ﾃｨﾃ｢ﾃ､ﾋ凖｢ﾂｪﾃｨIﾃｳﾏ\"end initGAMEon doorput random of 3 into aif fld"ﾃ‡ﾃｸﾃ‡ﾂｩﾃ‡ﾃ" <= 10 thenanswer "ﾃｳﾃ陛‡邃｢ﾃｫﾂｴﾃ‡ﾃ凝‡ﾂｻﾃ‡竕 ﾃ‡ﾆ津｢ﾃ崚‡ﾏ\ﾃ‡ﾂｻﾃ‡ﾂ｢"subtract a  from fld"HP"if fld"HP" <= 0 then dedexit doorend ifanswer "ﾃ栄ﾃ陰ﾃ‡ï｣ｿﾃｮjﾃ｢ﾃ崚‡ﾂｵﾃ‡ﾎｩ"play bokanwait 6subtract a from fld"HP"if fld"HP" <= 0 then dedadd 3 to fld"EX"if fld"EX" >= fld"EXN" then lvUpvisual effect dissolvego to cd "ﾃ｣窶｡ﾃ･窶ｦﾃｩ竏ｫ"end dooron open1if fld "MP"<5 then answer"MPﾃ‡邃｢ﾃ‡ﾎｩﾃ‡ﾃ凝‡ﾂｻﾃ‡ﾂ｢ﾃ⑩"if fld "MP"<5 then exit open1play"ﾃ｢ﾃ津ｯﾃｺ" aanswer "ﾃ迂ﾃ…[ﾃ益ﾃ嘉ｬﾃ‡ï｣ｿﾃ･yﾃ‡竕 ﾃｨ窶｢ﾃ‡ﾂｶﾃ‡ﾎｩﾃ③ﾃ栄ﾃ陰ﾃ‡ﾃε永ﾃ嘉ｬﾃ頴ﾃ…[ﾃ‡ﾃ陛㈻ﾃ㈶ﾃ㈿ﾃ㈵ﾃ㈻...3ﾃ‡ﾃｦﾃ③ﾃ‡窶 ﾃ‡ﾃ催⑨ﾃ㈲ﾃ‡ﾃｦﾃ‡ﾂ｡ﾃ‡ﾃ佚⑨"with"ﾃ鋭ﾃ鵜"subtract 5 from fld "MP"end open1on eraplay "ﾃ‡ﾃ陛‡ﾃ暗‡ﾃ陛‡ﾃˆ"answer"ﾃ英ﾃ厩ﾃ嘉ｨﾃ…[ﾃ栄ﾃ烏ﾃ嘉｢ﾃ…["subtract 2 from fld "HP"if fld "HP" <=0 then dedend eraon open2if fld "MP" < 8 then answer"MPﾃ‡邃｢ﾃ‡ﾎｩﾃ‡ﾃ凝‡ﾂｻﾃ‡ﾂ｢ﾃ⑩"if fld "MP" < 8 then exit open2play"ﾃ｢ﾃ津ｯﾃｺ" banswer "ﾃ迂ﾃ…[ﾃ益ﾃ嘉ｬﾃ‡ï｣ｿﾃ｣竕 ﾃ‡竕 ﾃｨ窶｢ﾃ‡ﾂｶﾃ‡ﾎｩﾃ③ﾃ栄ﾃ陰ﾃ‡ﾃε永ﾃ嘉ｬﾃ頴ﾃ…[ﾃ‡ﾃ陛㈻ﾃ㈶ﾃ㈿ﾃ㈵ﾃ㈻ﾃ㈲ﾃ③ﾃ栄ﾃ陰ﾃ‡邃｢ﾃ､Jﾃ‡ﾂ｢ﾃ‡ﾎｩﾃ③"with"ﾃ‡窶堙‡ﾂ｡ﾃ‡ﾎｩﾃ‡窶 "subtract 8 from fld "MP"visual effect dissolvego to cd "ﾃ｣窶｡ﾃ･窶ｦﾃｩ竏ｫ"end open2on kinkoput random of 1200 into aanswer"ﾃ･ﾃ†ﾃ‡邃｢ﾃ､Jﾃ‡ﾂ｢ﾃ‡ﾎｩﾃ③"with"ﾃ‡窶堙‡ﾂ｡ﾃ‡ﾎｩﾃ‡窶 "answer a &"ﾃ唄ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡ï｣ｿﾃｩﾃ凝‡窶ｦﾃｬﾂｸﾃ‡ﾃ催‡ﾎｩﾃ③"add a to fld "GOLD"play "ﾃ‡ﾂｮﾃ‡ﾂｩﾃ‡ﾃ\"end kinkoon era2play "ﾃ‡ﾃ陛‡ﾃ暗‡ﾃ陛‡ﾃˆ"answer"ﾃ英ﾃ厩ﾃ嘉ｨﾃ…[ﾃ栄ﾃ烏ﾃ嘉｢ﾃ…["subtract 4 from fld "HP"if fld "HP"<=0 then dedend era2on initGAME2initGAMEask"ﾃｨﾃ｢ﾃ､ﾋ凖｢ﾂｪﾃ‡邃｢ﾃｨIﾃｳﾏ\ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩﾃ③ﾃ嘉､ﾃ運ﾃ…[ﾃ嘉ｬﾃ鵜ﾃ…[ﾃ‡ï｣ｿﾃ｢ﾃｼﾃ‡ﾂｵﾃ‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"if it is"ﾃ‡竕･ﾃ‡ﾂ｢ﾃ‡ﾂｴﾃ‡ﾃづ‡ﾂｧ" thensaikyouexit initGAME2end ifput 0 into fld"GOLD"put "ﾃ‡ﾂｻﾃ‡ﾂｻﾃ‡ﾂｵ" into fld"NAME"put 0 into fld"LV"put 0 into fld"MAX HP"put 0 into fld"HP"put 0 into fld"MAX MP"put 0 into fld"MP"put 0 into fld"ﾃ‡ﾃｸﾃ‡ﾂｩﾃ‡ﾃ"put 0 into fld"EX"put 0 into fld"EXN"put 0  into fld aput 0  into fld bput 0  into fld cend initGAME2on openStackgo to cd"ﾃ迂ﾃ…[ﾃ益ﾃ泳ﾃ嘉ｬﾃ碓"create menu"ﾃ渦ﾃ…[ﾃ嘉„"put"ﾃｨﾃ｢ﾃ､ﾋ凖｢ﾂｪ" after menu"ﾃ渦ﾃ…[ﾃ嘉„"with menuMessage"initGAME2"put"ﾃ瓜ﾃ…[ﾃ疫ﾃ⑥ﾃ嘉ｧﾃ…[ﾃ栄" after menu"ﾃ渦ﾃ…[ﾃ嘉„"with menuMessage"gosave"put "ﾃｨIﾃｳﾏ\" after menu"ﾃ渦ﾃ…[ﾃ嘉„"with menuMessage"owari"end openStackon owaridoMenu Quit HyperCardend owarion closeStackdelete menu"ﾃ渦ﾃ…[ﾃ嘉„"end closeStackon terepoanswer"MPﾃ‡邃｢ﾃｫSﾃｯﾃｮﾃ‡ﾂｻﾃ‡竕 ﾃ‡ﾂｻﾃ‡ﾃ凝‡窶ｹﾃ‡竏妥③ﾃｩgﾃ‡ﾂｧﾃ‡竏†ﾃｧ竕暗ｨﾃ｢ﾃ‡ﾃεｯﾃｮﾃ｢ﾃ†ﾃ‡窶ｦﾃｱïｬづ‡ﾃ凝‡窶ｹﾃ‡竏妥③ﾃｩgﾃ‡ﾂ｢ﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨"withﾂｬ"ok"or"cansel"if it is"cansel" then exit terepoif fld "MP"<= 30 then answer"MPﾃ‡邃｢ﾃ㈶ﾃ㈴ﾃ ﾂｻﾃｨ窶榲ｯKﾃｳvﾃ③"if fld "MP"<= 30 then exit terepoelse put 0 into fld "MP"play "ﾃ｢ﾃ津ｯﾃｺ" a bgo to cd "ﾃ英ﾃ噂ﾃ嘘ﾃ嘉ｬﾃｩ竏ｫﾃ‡ﾃε栄ﾃ陰"end terepoon openanswer"ﾃ栄ﾃ陰ﾃ‡窶堙嘉ｧﾃ叡ﾃ丑ﾃ‡ï｣ｿﾃ‡ﾃ陛‡竏湘‡竏妥ｱﾃ‡ﾃｱ@ﾃ‡竕暗‡竏妥③ﾃｧﾂｰﾃ‡ﾃ陛ｩgﾃ‡ﾂｶﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③"end openon lightanswer"ﾃｱﾃｦﾃ‡ﾂｩﾃ‡ﾃ凝‡ï｣ｿﾃ‡ﾂｬﾃ‡ﾃ佚‡ﾃ暗ｱﾃ‡ﾃｱ@ﾃ‡竕暗‡竏妥③ﾃｧﾂｰﾃ‡ﾃ陛ｩgﾃ‡ﾂｶﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③"end lighton gagaCanswer"Use?"with"yes"or"no"if it is"no" then exit gagaCif fld"MP"<= 20 then answer"MPﾃｯsﾃｫﾂｴ"with"ok"if fld"MP"<= 20 then exit gagaCelse answer"ﾃ･oﾃ･ﾂｱﾃｭlﾃ‡邃｢ﾃｨ窶榲‡邃｢ﾃ‡ﾂ｡ﾃ‡ﾎｩ"put random of 10 into aput Round (fld"EXN"/5) into badd (a+b) to fld"EX"if fld "EX">=fld"EXN" then lvUpsubtract 20 from fld"MP"end gagaCon light1if fld "c" is "ﾃ嘉｢ﾃ韻ﾃ曳"then answer"ﾃ‡窶ｹﾃ‡ﾂ｡ﾃ‡竕 ﾃ‡ﾃﾃ‡ﾃｦﾃ③ﾃｱﾃ‡ﾃｱ@ﾃ嘉｢ﾃ韻ﾃ曳ﾃ‡ï｣ｿﾃｩgﾃ‡ﾂ｢ﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨"withﾂｬ"ok"or"cansel"if it is"cansel"then exit light1if fld "MP" <=0 then answer"MPﾃ‡邃｢ﾃｫﾂｴﾃ‡ﾃ凝‡ﾂｻﾃ‡ﾂ｢"if fld "MP" <=0 then exit light1subtract 2 from fld "MP"wait 6answer"ﾃｱﾃｦﾃ‡ﾃ暗‡竕 ﾃ‡ﾂｻﾃ‡ﾂ｡ﾃ‡ﾎｩﾃ⑩"wait 18go to cd "ﾃｬ窶ｰﾃ‡ﾃεｯﾃｮﾃ｢ﾃ†ﾃ㈻"end light1on Keyanswer"ﾃ､zﾃ｢ﾃｨﾃ‡ﾃεｳ窶 ﾃ‡ï｣ｿﾃｭTﾃ‡ﾂｵﾃ‡ﾆ津‡ﾂ｢ﾃ‡窶ｹﾃ‡竏妥③"with"ﾃ‡竕､ﾃ‡ﾂｪﾃ‡竕､ﾃ‡ﾂｪ"play "pi" kanswer"ﾃ‡ﾂｻﾃ‡ﾃ津‡竏†ﾃ･ﾃ†ﾃ‡ï｣ｿﾃ‡窶ｺﾃ‡ﾂｬﾃ‡ﾃ佚‡ﾎｩﾃ⑩"with"ﾃ‡窶堙‡ﾂ｡ﾃ‡ﾎｩﾃ⑩"show cd btn "key"wait 54hide cd btn "Key"put "ﾃ･ﾃ†" into fld "ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈶"hide cd btn "ﾃ･ﾃ†"end Keyon sirabeask"ﾃ‡ﾂｫﾃ‡ﾂｱﾃ‡ï｣ｿﾃ‡ﾂ｢ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃ‡ﾂ｢ﾃｭTﾃ‡竏妥‡ﾃε⑨"if it is"ﾃｳ窶 " then Keyif it is"ﾃ‡ﾂｧﾃ‡ﾃ"then Keyif it is"ﾃ‡邃｢ﾃ‡竕 ﾃ‡窶佚‡ﾃｸﾃ‡ﾃε‡ﾂｧﾃ‡ﾃ"then Keyif it is"ﾃ､zﾃ｢ﾃｨﾃ‡ﾃε‡ﾂｧﾃ‡ﾃ"then Keyif it is"ﾃ‡邃｢ﾃ‡竕 ﾃ‡窶佚‡ﾃｸﾃ‡ﾃεｳ窶 "then Keyif it is"ﾃ､zﾃ｢ﾃｨﾃ‡ﾃεｳ窶 "then Keyend sirabeon umaif fld"GOLD"<30 then answer"ﾃ‡ﾂｮﾃ｣窶｡ﾃ‡邃｢ﾃｫﾂｴﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ’"if fld"GOLD"<30 then exit umasubtract 30 from fld "GOLD"go to cd"dark"wait 82put Round(fld"MAX MP"/2) into aadd a to fld"MP"if fld"MP"> fld"MAX MP" then put fld "MAX MP" into fld"MP"go to cd"ﾃｨhﾃ｢ﾃ†"end umaon namiif fld"GOLD"<50 then answer"ﾃ‡ﾂｮﾃ｣窶｡ﾃ‡邃｢ﾃｫﾂｴﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ’"if fld"GOLD"<50 then exit namisubtract 50 from fld"GOLD"go to cd"dark"wait 76put Round(fld "MAX MP"/2) into aadd a to fld"MP"if fld"MP"> fld"MAX MP" then put fld"MAX MP"into fld"MP"put fld"MAX HP" into fld "HP"go to cd"ﾃｨhﾃ｢ﾃ†"end namion kouif fld"GOLD"<80 then answer"ﾃ‡ﾂｮﾃ｣窶｡ﾃ‡邃｢ﾃｫﾂｴﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ’"if fld"GOLD"<80 then exit kousubtract 80 from fld"GOLD"go to cd"dark"wait 70put fld"MAX HP" into fld"HP"put fld"MAX MP" into fld"MP"go to cd"ﾃｨhﾃ｢ﾃ†"end kouon keyRockif fld c is "ﾃ迂ﾃ…[ﾃ益ﾃ嘉ｬ" thenanswer"ﾃｱﾃ‡ﾃｱ@ﾃ迂ﾃ…[ﾃ益ﾃ嘉ｬﾃ‡ï｣ｿﾃｩgﾃ‡ﾂ｢ﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨"with"ﾃｩgﾃ‡ﾂｧ"or"ﾃｩgﾃ‡ﾃ古‡ﾂｻﾃ‡ﾂ｢"if it is "ﾃｩgﾃ‡ﾂｧ" thenif fld"MP">= 8 thensubtract 8 from fld"MP"answer"ﾃ‡ﾂｱﾃ‡ﾃεｮ窶｡ﾃ‡ﾃεｮ窶佚ｧﾃ愿‡ﾃ•5384ﾃ‡ﾃｦﾃ③"answer"ﾃｮ窶｡ﾃ‡邃｢ﾃ､Jﾃ‡ﾂ｢ﾃ‡ﾎｩﾃ③"visual effect zoom opengo to cd"kouri"exit keyRockelseanswer"MPﾃ‡邃｢ﾃ‡ﾎｩﾃ‡ﾃ凝‡ﾂｻﾃ‡ﾂ｢ﾃ⑩(8ﾃ ﾂｻﾃｨ窶榲ｯKﾃｳvﾃ③)"end ifend ifask"ﾃ英ﾃ厩ﾃ嘉ｨﾃ…[ﾃ栄ﾃ‡ï｣ｿﾃｬﾂｸﾃｳﾃ陛‡ﾂｵﾃ‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢"put "ﾃ｢pﾃｩﾃｶﾃｬﾂｸﾃｳﾃ陛嘉‡ﾃ…[ﾃ栄ﾃ‡竕暗ｬﾂｸﾃｳﾃ陛‡竏妥‡ﾃ暗‡ﾂｱﾃ‡竏†ﾃ③"if it is "" thenanswer"ﾃ‡窶堙‡ﾂ｡ﾃ‡ﾅ禿‡ﾃ凝‡ﾃ古‡ﾂｩﾃ‡ﾃﾃ‡ﾂｻﾃ‡ﾂ｢ﾃ‡ﾃｦﾃ‡ﾃ偲‡ﾂｧﾃ‡ﾂｻﾃ‡ﾃｼ"exit KeyRockend ifif it is 5384 thenvisual effect zoom opengo to cd "kouri"exit KeyRockend ifask"ﾃ英ﾃ厩ﾃ嘉ｨﾃ…[ﾃ栄ﾃ‡ï｣ｿﾃｬﾂｸﾃｳﾃ陛‡ﾂｵﾃ‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢"if it is 5384 thenvisual effect zoom opengo to cd "kouri"exit KeyRockEND IFend ifask"ﾃ英ﾃ厩ﾃ嘉ｨﾃ…[ﾃ栄ﾃ‡ï｣ｿﾃｬﾂｸﾃｳﾃ陛‡ﾂｵﾃ‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢"put "ﾃ｢pﾃｩﾃｶﾃｬﾂｸﾃｳﾃ陛嘉‡ﾃ…[ﾃ栄ﾃ‡竕暗ｬﾂｸﾃｳﾃ陛‡竏妥‡ﾃ暗‡ﾂｱﾃ‡竏†ﾃ③"if it is "" thenanswer"ﾃ‡窶堙‡ﾂ｡ﾃ‡ﾅ禿‡ﾃ凝‡ﾃ古‡ﾂｩﾃ‡ﾃﾃ‡ﾂｻﾃ‡ﾂ｢ﾃ‡ﾃｦﾃ‡ﾃ偲‡ﾂｧﾃ‡ﾂｻﾃ‡ﾃｼ"exit KeyRockend ifif it is 5384 thenvisual effect zoom opengo to cd "kouri"end ifend keyRockon yakuanswer"ﾃｱﾃ堙ｫﾃｪﾃ‡ï｣ｿﾃｩgﾃ‡ﾂ｢ﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨"with"ok"or"cansel"if it is"cansel"then exit yakuput "" into fld"ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈲"put random of 12 into aadd (a+10) to fld "HP"if fld"HP"> fld "MAX HP" then put fld "MAX HP" into fld "HP"answer"ﾃ‡gﾃ‡oﾃ‡邃｢ﾃ｢ﾃ津ｯﾃｺﾃ‡ﾂｵﾃ‡ﾎｩﾃ⑩"end yakuon tdedanswer"ﾃｯﾂｫﾃ‡ï｣ｿﾃｮjﾃ｢ﾃ崚‡ﾂｵﾃ‡ﾎｩﾃ⑩"with"ﾃ‡窶堙‡ﾂ｡ﾃ‡ﾎｩﾃ‡ﾃｼ"put random of 3 into aadd (a*20+3) to fld"EX"if fld"EX" >= fld"EXN" then lvUpanswer fld NAME &"ﾃ‡ﾃ•"&(A*20+3)&"ﾃ榎ﾃ韻ﾃ嘉ｬﾃ曳ﾃ‡ﾃε･oﾃ･ﾂｱﾃｭlﾃ‡ï｣ｿﾃｬﾃｦﾃ‡ﾎｩﾃ③"answer"ﾃ…wﾃ‡窶禿⑶ﾃ‡ﾂｩﾃ‡ﾃ津‡笳甘‡ﾃ津‡ﾂｵﾃ‡ﾆ津⑶ﾃ…x"with"ﾃ｣ﾃｱﾃ‡ﾂｵﾃ‡ﾆ津‡窶堙‡ﾃ偲‡ﾂｧ"answer"ﾃ…wﾃ‡ﾂｧﾃ‡ﾂ｡ﾃ‡ﾂｪﾃ‡窶愿‡ﾃづ‡ﾃ津…x"with"ﾃ‡ﾃｦﾃ‡窶ｹﾃ‡竕･ﾃ‡ﾃ催‡ﾎｩﾃ⑩"end tdedon Fri1if fld "MP"< 10 thenanswer"MPﾃ‡邃｢ﾃｫﾂｴﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③"exit Fri1end ifput random of 3 into cput random of 9 into dput random of 4 into eput fld "LV" into fput fld "HP" into gsubtract 10 from fld"MP"answer"ﾃ栄ﾃ嘉｢ﾃ唄ﾃ嘉ｬﾃ‡邃｢ﾃｪﾃ甘‡窶ｦﾃｧUﾃ･ﾃ‡ﾃ‡ﾂｵﾃ‡ﾆ津‡ﾂｴﾃ‡ﾎｩﾃ⑩" with "ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡ﾂ｡ﾃ‡ﾎｩﾃ⑩"put (e+f+3) into hanswer fld NAME &"ﾃ‡ﾃ•" &Round(g/e+h) &"ﾃ榎ﾃ韻ﾃ嘉ｬﾃ曳ﾃ‡ﾃε雲ﾃ嘉…ﾃ…[ﾃ姥ﾃ‡ï｣ｿﾃｩﾃ崚‡ﾃ佚‡ﾎｩﾃ③"subtract Round(g/e+h) from fld"HP"if fld"HP" < 0 thendedexit Fri1end ifplay "pi" a2answer" ﾃ液ﾃ嘉､ﾃ…[ﾃ浦ﾃ⑩ﾃ…wﾃ衛ﾃ嘉姪嘉｣ﾃ衛ﾃ嘉姪嘉｣ﾃ②ﾃ雨ﾃ荏ﾃ嘉ｬ!ﾃ…xﾃ‡窶堙‡ﾂ｡ﾃ‡ﾎｩﾃ‡窶 ﾃ⑩ﾃ栄ﾃ嘉｢ﾃ唄ﾃ嘉ｬﾃ‡ï｣ｿﾃ‡窶堙‡ﾂ｡ﾃ‡ﾂｬﾃ‡ﾃ佚‡ﾎｩﾃ‡ﾂｺ!"answer fld NAME &"ﾃ‡ﾃ•" &(12*c+d)& "ﾃ榎ﾃ韻ﾃ嘉ｬﾃ曳ﾃ‡ﾃε･oﾃ･ﾂｱﾃｭlﾃ‡ï｣ｿﾃｬﾃｦﾃ‡ﾎｩﾃ③"add (12*c+d) to fld "EX"if fld"EX" >= fld"EXN" then lvUpwait 12go to cd "egg5"wait 5go to cd"egg4"wait 5go to cd"egg3"wait 5go to cd"egg2"wait 3go to cd"egg"answer"ﾃ栄ﾃ嘉｢ﾃ唄ﾃ嘉ｬﾃ‡ﾃ•" &(c+d)& "ﾃ唄ﾃ…[ﾃ嘉｣ﾃ栄ﾃｳﾃｩﾃ‡竏†ﾃ‡ﾂｵﾃ‡ﾆ津②ﾃ‡窶ｹﾃ‡ﾎｩﾃｳﾃｫﾃ‡ﾃεｭﾃ愿‡窶ｦﾃｬﾂｶﾃ‡竏榲ｨoﾃ‡ﾂｵﾃ‡ﾎｩﾃ③"add (c+d) to fld "GOLD"end Fri1on fight1put 50 into cd fld "THP"repeat until cd fld "THP"<= 0answer"ﾃ栄ﾃ嘉｢ﾃ唄ﾃ嘉ｬﾃ‡邃｢ﾃｧUﾃ･ﾃ‡ﾃ‡ﾂｵﾃ‡ﾆ津‡ﾂｴﾃ‡ﾎｩﾃ⑩"play bokanput random of 8 into aput fld"MAX HP" into bput fld"ﾃ‡ﾃｸﾃ‡ﾂｩﾃ‡ﾃ" into cput random of 10 into dput random of 5 into eanswer fld NAME &"ﾃ‡ﾃ•" &Round(b/6+a) &"ﾃ榎ﾃ韻ﾃ嘉ｬﾃ曳ﾃ‡ﾃε雲ﾃ嘉…ﾃ…[ﾃ姥ﾃ‡ï｣ｿﾃｩﾃ崚‡ﾃ佚‡ﾎｩ!"subtract Round(b/6+a) from fld "HP"if fld "HP" <= 0 thendedexit fight1end ifplay hit2answer fld NAME &"ﾃ‡ﾃ陛栄ﾃ嘉｢ﾃ唄ﾃ嘉ｬﾃ‡窶ｦ" &(c+d)& "ﾃ榎ﾃ韻ﾃ嘉ｬﾃ曳ﾃ‡ﾃε雲ﾃ嘉…ﾃ…[ﾃ姥ﾃ‡ï｣ｿﾃｳ^ﾃ‡ﾂｶﾃ‡ﾎｩﾃ⑩"subtract (c+d) from cd fld"THP"if cd fld "THP" <=0 thenanswer"ﾃ栄ﾃ嘉｢ﾃ唄ﾃ嘉ｬﾃ‡ï｣ｿﾃｫïｬﾃｩﾂｰﾃ‡ﾂｵﾃ‡ﾎｩ!"answer fld NAME &"ﾃ‡ﾃ•" &(120*e)& "ﾃ榎ﾃ韻ﾃ嘉ｬﾃ曳ﾃ‡ﾃε･oﾃ･ﾂｱﾃｭlﾃ‡ï｣ｿﾃｬﾃｦﾃ‡ﾎｩﾃ③"add (120*e) to fld "EX"if fld"EX" >= fld"EXN" then lvUpwait 12go to cd "egg5"wait 5go to cd"egg4"wait 5go to cd"egg3"wait 5go to cd"egg2"wait 3go to cd"egg"answer"ﾃ栄ﾃ嘉｢ﾃ唄ﾃ嘉ｬﾃ‡ﾃ•" &(c+d+1000)& "ﾃ唄ﾃ…[ﾃ嘉｣ﾃ栄ﾃｳﾃｩﾃ‡竏†ﾃ‡ﾂｵﾃ‡ﾆ津②ﾃ‡窶ｹﾃ‡ﾎｩﾃｳﾃｫﾃ‡ﾃεｭﾃ愿‡窶ｦﾃｬﾂｶﾃ‡竏榲ｨoﾃ‡ﾂｵﾃ‡ﾎｩﾃ③"add (c+d+1000) to fld "GOLD"end ifend repeatend fight1on sita1answer"ﾃ｢竏ｫﾃｩﾃ甘‡ﾃ凝｢ﾃｸﾃ､iﾃ㈲ﾃ㈴ﾃ㈴ﾃ‡f,OK?"with"OK"or"CANSEL"if it is "CANSEL" then exit sita1if fld"GOLD" < 100 thenanswer"ﾃ‡ﾂｮﾃ｣窶｡ﾃ‡邃｢ﾃｫﾂｴﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津⑩"exit sita1end ifsubtract 100 from fld"GOLD"put "ﾃｱhﾃ｢ﾅ津ｯﾃｻ" into fld"ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈼"answer"ﾃ‡窶 ﾃ‡ﾃ凝‡邃｢ﾃ‡竏†ﾃ‡ﾂｧﾃ‡竕､ﾃ‡ﾂ･ﾃ‡ﾂ｢ﾃ‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩﾃ③"end sita1on sita2answer"ﾃ｢竏ｫﾃｩﾃ甘‡ﾃ凝｢ﾃｸﾃ､iﾃ㈲ﾃ㈻ﾃ㈴ﾃ‡fﾃ②OK?"with"OK"or"CANSEL"if it is "CANSEL" then exit sita2if fld"GOLD" < 120 thenanswer"ﾃ‡ﾂｮﾃ｣窶｡ﾃ‡邃｢ﾃｫﾂｴﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津⑩"exit sita2end ifsubtract 120 from fld"GOLD"put "ﾃ烏ﾃ…[ﾃ影ﾃ嘉｣" into fld"ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈳"answer"ﾃ‡窶 ﾃ‡ﾃ凝‡邃｢ﾃ‡竏†ﾃ‡ﾂｧﾃ‡竕､ﾃ‡ﾂ･ﾃ‡ﾂ｢ﾃ‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩﾃ③"end sita2on sita3answer"ﾃ｢竏ｫﾃｩﾃ甘‡ﾃ凝｢ﾃｸﾃ､iﾃ㈲ﾃ㈴ﾃ‡fﾃ②OK?"with"OK"or"CANSEL"if it is "CANSEL" then exit sita3if fld"GOLD" < 10 thenanswer"ﾃ‡ﾂｮﾃ｣窶｡ﾃ‡邃｢ﾃｫﾂｴﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津⑩"exit sita3end ifsubtract 10 from fld"GOLD"put "ﾃ閲ﾃ嘉„" into fld"ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈳"answer"ﾃ‡窶 ﾃ‡ﾃ凝‡邃｢ﾃ‡竏†ﾃ‡ﾂｧﾃ‡竕､ﾃ‡ﾂ･ﾃ‡ﾂ｢ﾃ‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩﾃ③"end sita3on saikyouput"ﾃｧﾃｺﾃ‡ﾃε･ﾃ†" into fld"ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈶"put"ﾃ‡dﾃｱhﾃ｢ﾅ津ｯﾃｻ" into fld"ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈼"put"ﾃ烏ﾃ嘉､ﾃ丑ﾃ欝ﾃ…[" into fld"ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈵"put"ﾃｱﾃ堙ｫﾃｪ" into fld "ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈲"put"ﾃ嘉｢ﾃ嘉ｬﾃ益" into fld "ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈻"put"ﾃ閲ﾃ嘉„" into fld "ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈳"put"ﾃｧ竕暗･窶榲‡ﾃε･ﾃ†" into fld "ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈽"put fld"MAX HP" into fld "HP"put fld"MAX MP" into fld "MP"add 1000 to fld "GOLD"answer"ﾃ‡ﾂｫﾃ‡ﾂｱﾃ‡ﾃｷﾃｧsﾃ‡ﾂｴﾃ‡ﾎｩﾃ‡ﾂ｢ﾃ⑨"with"ﾃ‡ïｬづ‡ﾂ｢ﾃ‡ﾃŽ"or"ﾃｨoﾃ･ﾋ堙ｯsﾃｱﾃｦ"or"ﾃ‡竕暗‡ﾃ津‡ﾃŒ"if it is"ﾃ‡ïｬづ‡ﾂ｢ﾃ‡ﾃŽ" then go to cd"ﾃｱﾂｿﾃｲHﾃ㈲"if it is"ﾃｨoﾃ･ﾋ堙ｯsﾃｱﾃｦ" then go to cd"ﾃ英ﾃ…[ﾃ噂ﾃ嘉ｬ"if it is"ﾃ‡竕暗‡ﾃ津‡ﾃŒ" then go to cd"ﾃｬdﾃｲbﾃ‡ﾃε‡窶 ﾃ‡ﾃ暗ｯﾃｮﾃ｢ﾃ†"end saikyouon pizaput random of 4 into aput random of 3 into banswer"ﾃ‡ﾃ陛‡ﾂ｢ﾃｫﾃ禿ｮzﾃ鋭ﾃ蔚ﾃ‡竕暗‡竏妥③ﾃ㈲ﾃｱﾃ｡ﾃ㈻ﾃ㈵ﾃ㈴ﾃ唄ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡竕暗‡竏妥③ﾃ‡ﾂｫﾃ‡ﾂｧﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨"ﾂｬwith"ﾃ‡ﾎｩﾃ‡ﾃε‡ïｬ"or"ﾃ‡ﾎｩﾃ‡ﾃε‡窶ｹﾃ‡ﾂｻﾃ‡ﾂ｢"if it is "ﾃ‡ﾎｩﾃ‡ﾃε‡窶ｹﾃ‡ﾂｻﾃ‡ﾂ｢"then exit pizaif fld "GOLD" < 250 thenanswer"ﾃ‡ﾂｮﾃ｣窶｡ﾃ‡邃｢ﾃｫﾂｴﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③"exit pizaend ifsubtract 250 from fld"GOLD"answer"ﾃ‡窶ｹﾃ‡ﾂ｢ﾃ‡ﾂｫﾃ⑶ﾃ③ﾃ鋭ﾃ蔚ﾃ‡竕暗⑶ﾃ‡竏妥③"if a is 4 thenanswer"ﾃ‡ﾂｮﾃ‡ﾂ｢ﾃ‡ﾂｵﾃ‡ﾂ｢ﾃ⑩"add b to fld "ﾃ‡ﾃｸﾃ‡ﾂｩﾃ‡ﾃ"answer"ﾃ‡ﾃｸﾃ‡ﾂｩﾃ‡ﾃﾃ‡邃｢" & b & "ﾃ榎ﾃ韻ﾃ嘉ｬﾃ曳ﾃ‡窶 ﾃ‡邃｢ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃ③"end ifif a is 3 thenanswer"ﾃ‡ﾂｮﾃ‡ﾂ｢ﾃ‡ﾂｵﾃ‡ﾂ｢ﾃ⑩!"add (b+5) to fld "MAX HP"answer"ﾃｫﾃεｳﾃ陛‡邃｢"& (b+5) &"ﾃ榎ﾃ韻ﾃ嘉ｬﾃ曳ﾃｨ窶榲‡邃｢ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃ⑩"put fld"MAX HP" into fld "HP"end ifif a is 2 thenanswer"ﾃ‡ﾂｻﾃ‡ﾂｩﾃ‡ﾂｻﾃ‡ﾂｩﾃ‡ﾂ｢ﾃ‡ﾃ佚‡ﾃ暗⑩"add b to fld "MAX MP"answer"ﾃｱﾃ‡ﾃｳﾃ陛‡邃｢" & b & "ﾃ榎ﾃ韻ﾃ嘉ｬﾃ曳ﾃｨ窶榲‡邃｢ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃ⑩"put fld"MAX MP" into fld "MP"end ifif a is 1 thenanswer"ﾃ‡竏榲‡竏榲‡ﾂ｡ﾃ⑩ﾃ‡窶ｹﾃ‡竏湘⑶ﾃ‡ﾂ｢ﾃ⑶ﾃ⑩"put Round(fld"HP"/2) into fld"HP"answer"ﾃ‡窶ｹﾃ‡竏湘‡竕 ﾃ‡ﾆ津ｫﾃεｳﾃ陛‡邃｢ﾃｮﾂｺﾃ･竏湘‡ﾂｵﾃ‡ﾎｩﾃ⑩ﾃ⑩"with"ﾃ‡竕 ﾃ‡ﾂｪﾃ⑶"answer"ﾃ‡ﾂｪﾃ‡ﾃε‡ﾂｩﾃ‡ﾃ古‡ﾃ凝‡窶ｦﾃ‡ﾂｻﾃ‡竏ｫﾃ‡ﾂｩﾃ･oﾃ･ﾂｱﾃｭlﾃ‡邃｢ﾃｨ窶榲‡邃｢ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃ⑩"with"ﾃ‡ﾂｻﾃ‡ﾃ津‡竕暗⑶ﾃ⑨"add (b*20) to fld "EX"if fld"EX" >= fld"EXN" then lvUpend ifend pizaon mabuanswer"ﾃ‡ﾂｮﾃｬdﾃｲbﾃ‡窶 ﾃ‡ﾃ凝‡邃｢ﾃ‡竏†ﾃ‡ﾂｧﾃ③ﾃｬﾂ｡ﾃｯﾂ ﾃ‡窶ｦﾃ‡ﾂｱﾃ‡ﾃε雲ﾃ嘉ｬﾃ姥ﾃ嘉｡ﾃ嘉ｬﾃ‡ﾃε衛ﾃ嘉ｬﾃ曳ﾃ‡ï｣ｿﾃ‡窶 ﾃ‡竏榲‡ﾃ暗‡ﾃ甘③"with"ﾃ嘉｢ﾃ叡ﾃ鵜ﾃ…["answer"ﾃｭTﾃ‡竏妥‡竏†ﾃｬﾃｦﾃ‡窶ｦﾃ‡ﾂｻﾃ‡ﾃ暗ｨﾃ催ｨﾃ､ﾃ‡ï｣ｿﾃ｣竕･ﾃ‡ﾂｶﾃ‡ﾃ甘‡ﾂｧﾃ③ﾃ‡窶ｹﾃ‡竏湘②ﾃｨoﾃ･ﾋ堙‡ﾃε‡ﾂｻﾃ‡ﾂ｢ﾃｯﾃｮﾃ｢ﾃ†ﾃ‡ﾃεｯﾂｫﾃ③"with"ﾃ‡ﾃ甘‡竕 ﾃｭTﾃ‡ﾂｪﾃ‡ﾂｧ"answer"ﾃ‡ﾂｪﾃ‡ﾃ催‡ﾂｩﾃ‡ﾃﾃ②ﾃｱlﾃ‡ﾃεｯﾃｮﾃ｢ﾃ†ﾃ‡窶ｦﾃ‡窶 ﾃ‡ﾃ暗‡竕､ﾃ‡窶ｺﾃｮ窶 ﾃ③ﾃ‡ﾂｪﾃ‡ﾃ催‡ﾂｩﾃ‡ﾃﾃ②ﾃｧﾃｺﾃ‡ﾃε･ﾃ†ﾃ‡ï｣ｿﾃｩﾃｹﾃ‡ﾂ｡ﾃ‡ﾆ津‡ﾂ｢ﾃ‡ﾎｩﾃ‡ﾃﾃ｣窶｡ﾃ･窶ｦﾃｩ竏ｫﾃ‡窶ｦﾃ‡窶｡ﾃｧsﾃ‡ﾂ｡ﾃ‡ﾆ津‡窶ｺﾃ‡ﾃ甘‡ﾂｧﾃ③ﾃ｣窶｡ﾃ･窶ｦﾃｩ竏ｫﾃ‡ﾃεｮ窶佚ｧﾃ愿‡ﾃ陛‡ﾎｩﾃ‡ﾂｵﾃ‡ﾂｩ238521ﾃ‡ﾃｦﾃ‡ﾂ｡ﾃ‡ﾎｩﾃ‡竏†ﾃｩvﾃ‡ﾂｧﾃ③"with"ﾃ嘉･ﾃ叡ﾃ営ﾃ唄ﾃ…["answer"ﾃ‡ﾃ陛‡窶堙‡竕 ﾃ‡ﾂｱﾃ‡ﾃε雲ﾃ嘉ｬﾃ姥ﾃ嘉｡ﾃ嘉ｬﾃ‡ﾂｩﾃ‡ﾃﾃ‡竕暗‡ﾎｩﾃ‡ﾂ｢ﾃ‡竕暗‡ﾂｵﾃ‡ﾃづ⑨"with"ﾃ‡ﾂｧﾃ‡ﾃ’"or"ﾃ‡ﾂｧﾃ‡ﾂｧﾃ‡ﾃ’"if it is "ﾃ‡ﾂｧﾃ‡ﾂｧﾃ‡ﾃ’" thenanswer"ﾃ｣Cﾃ‡窶ｦﾃｬﾂｸﾃ‡ﾂ｡ﾃ‡ﾎｩﾃ‡ﾃε‡ﾂｻﾃ‡ﾃﾃ‡ﾂｱﾃ‡ﾃε雲ﾃ嘉ｬﾃ姥ﾃ嘉｡ﾃ嘉ｬﾃ‡窶ｦﾃ‡竏湘‡ﾂ｡ﾃ‡竏†ﾃ‡ﾂ｢ﾃ‡ﾆ津‡窶｡ﾃ‡ﾂ｢ﾃ‡ﾂ｢ﾃ‡ﾃ津‡ﾃｦﾃ‡ﾃ甘③"with"ﾃ‡窶 ﾃ‡ﾂ｡ﾃ‡ﾂｪ"answer"ﾃｧ竕暗･窶榲‡窶ｦﾃｧsﾃ‡ﾂ｡ﾃ‡ﾆ津‡ﾂｮﾃ‡竕 ﾃ‡ﾃ佚‡ﾂｫﾃ‡ﾂｱﾃ‡ﾃε雲ﾃ嘉ｬﾃ姥ﾃ嘉｡ﾃ嘉ｬﾃ‡ﾃε鋭ﾃ蔚ﾃ‡ﾃ陛‡竏†ﾃ‡ﾂｴﾃ‡ﾂｫﾃ‡ﾂｴﾃ‡窶ｹﾃ‡竏湘‡ﾂ｢ﾃ‡窶｡ﾃ‡ﾃε‡邃｢ﾃ‡窶 ﾃ‡ﾃ暗‡ﾂｩﾃ‡ﾃﾃｭﾃｧﾃ 窶敕‡ﾂｵﾃ‡ﾆ津‡ﾃ\ﾃ③"with"ﾃ‡竕･ﾃ‡ﾂ｢ﾃ‡ﾂｻﾃ‡ﾃ"exit mabuend ifanswer"ﾃ‡ﾂｪﾃ‡ﾂｧﾃ‡竏づ‡ﾂｷﾃｱlﾃ‡ﾃεｳFﾃｭBﾃ‡ﾃεｬdﾃｲbﾃｮ窶佚ｧﾃ愿‡ï｣ｿﾃ｣竕･ﾃ‡ﾂｶﾃ‡ﾃ暗‡ﾂｩﾃ‡ﾃﾃ②ﾃ‡ﾂｪﾃ‡ﾂ｢ﾃ‡ﾂｬﾃ‡窶ｦﾃｭEﾃｨoﾃ‡ﾃε‡ﾂｵﾃ‡ﾂｩﾃ‡ﾎｩﾃ‡ï｣ｿﾃ‡ﾂｴﾃ‡ﾂｴﾃ‡ﾂｻﾃ③TEL 0771-952-2188"with"ﾃ‡竕･ﾃ‡ﾂ｢ﾃ‡ﾂｻﾃ‡ﾃ"end mabuon gosavego to cd"ﾃ瓜ﾃ…[ﾃ疫"end gosaveon hakaianswer"ﾃｮjﾃ｢ﾃ崚‡ﾂｵﾃ‡ﾎｩﾃ③ﾃｫOﾃ‡窶ｦﾃｧsﾃ‡ﾃ佚‡ﾃ暗③"go to cd"ﾃ､窶堙‡ﾃε‡ﾂｻﾃ‡ﾂ｢ﾃｯﾃｮﾃ｢ﾃ†"end hakaion susumuanswer"ﾃｪﾃ甘‡窶ｦﾃｪiﾃ‡窶ｺﾃ‡ﾎｩﾃ‡ﾂ｢ﾃ‡ﾂｩﾃ⑨ﾃ‡竅„ﾃ‡ﾂｧﾃ‡竏湘⑨"with"ﾃ‡ﾂｧﾃ‡ﾃ’"or"ﾃ‡ﾂｧﾃ‡ﾂｧﾃ‡ﾃ’"if it is"ﾃ‡ﾂｧﾃ‡ﾂｧﾃ‡ﾃ’" thenanswer"ﾃ‡ﾂｻﾃ‡ﾃ津‡竕暗⑶ﾃ⑨"with"?"exit susumuend ifanswer"ﾃｬdﾃｲbﾃ‡ﾃε｢竏ｫﾃ‡ﾃε運ﾃ嘉ｬﾃ厩ﾃ‡ﾃε｢竏ｫﾃ‡ﾂｩﾃ‡ﾃﾃ㈻ﾃｮ窶佚ｱ竅„ﾃ‡窶ｦﾃ厭ﾃ姥ﾃ叡ﾃ丑ﾃ穎ﾃ嘉ｬﾃ厭ﾃ…[ﾃ‡邃｢ﾃ‡窶 ﾃ‡ﾃ暗③ﾃ‡ﾂｪﾃ‡ﾃ催‡ï｣ｿﾃｩgﾃ‡ﾂ｢ﾃ‡ﾂｻﾃ⑩"end susumuon abcif fld "ﾃｩﾃｹﾃ‡ﾃｸﾃｯﾂｮﾃ㈽" is "ﾃ厭ﾃ姥ﾃ叡ﾃ丑ﾃ穎ﾃ嘉ｬﾃ厭ﾃ…[" thenanswer"ﾃ‡ﾂｫﾃ‡ﾂｧﾃ‡竏妥‡ﾃ暗⑨"with"ﾃ閲ﾃ嘉„ﾃ‡竕暗ｮjﾃ｢ﾃ›"or"ﾃ穎ﾃ嘉ｬﾃ厭ﾃ…[ﾃ‡竕暗ｮjﾃ｢ﾃ›"or"ﾃ‡窶 ﾃ‡ﾂｴﾃ‡ﾃﾃ‡ïｬづ‡ﾃˆ"if it is "ﾃ‡窶 ﾃ‡ﾂｴﾃ‡ﾃﾃ‡ïｬづ‡ﾃˆ" then exit abcif it is"ﾃ閲ﾃ嘉„ﾃ‡竕暗ｮjﾃ｢ﾃ›" thenplay bokananswer"ﾃｮﾃｶﾃｯﾃｳﾃ‡竕暗雲ﾃ嘉…ﾃ